object AnnForm: TAnnForm Left = 118 Top = 106 BorderStyle = bsDialog Caption = 'Anniversary List Editor' ClientHeight = 195 ClientWidth = 381 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnClose = FormClose OnShow = Show PixelsPerInch = 96 TextHeight = 13 object GroupBox1: TGroupBox Left = 2 Top = 1 Width = 177 Height = 193 Caption = 'Anniversary List' TabOrder = 0 object AnnList: TListBox Left = 8 Top = 15 Width = 161 Height = 172 ItemHeight = 13 TabOrder = 0 OnClick = AnnListClick end end object GroupBox2: TGroupBox Left = 182 Top = 1 Width = 124 Height = 193 Caption = 'View/Edit Selected' TabOrder = 1 object AnnMemo: TMemo Left = 6 Top = 68 Width = 111 Height = 118 Hint = 'Main Anniversary Text' ParentShowHint = False ShowHint = True TabOrder = 0 OnExit = AnnMemoExit end object AnnEdit: TEdit Left = 6 Top = 42 Width = 111 Height = 21 Hint = 'Anniversary Label' MaxLength = 15 ParentShowHint = False ShowHint = True TabOrder = 1 OnChange = AnnEditChange OnExit = AnnEditExit end object AnnDateBtn: TButton Left = 6 Top = 14 Width = 110 Height = 22 Hint = 'Anniversary Date' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = AnnDatePanelClick end end object CreateNewbtn: TBitBtn Left = 309 Top = 6 Width = 70 Height = 25 Caption = '&New' TabOrder = 2 OnClick = CreateNewbtnClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} NumGlyphs = 2 end object Erasebtn: TBitBtn Left = 309 Top = 35 Width = 70 Height = 25 Caption = '&Erase' TabOrder = 3 OnClick = ErasebtnClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550 305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000 005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0 B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0 B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000 B0557777FF577777F7F500000E055550805577777F7555575755500000555555 05555777775555557F5555000555555505555577755555557555} NumGlyphs = 2 end object BitBtn1: TBitBtn Left = 309 Top = 63 Width = 70 Height = 25 TabOrder = 4 Kind = bkClose end object BitBtn2: TBitBtn Left = 309 Top = 169 Width = 70 Height = 25 TabOrder = 5 OnClick = HelpbtnClick Kind = bkHelp end end